现在网上看的哪些技术教程，看起头都大了，不知道是没有用心写还是怎么的，我来写点让大家看起来都轻松的，一看就会，不懂就在下面评论。

首先来代码。

Sub 边框修改()

Worksheets("2").Range("A1").Borders.LineStyle = 1

End Sub

其中Worksheets就是代表所有的打开的工作表，后面跟上括号里面是工作表的名称，接着Range，里面我们输入A1，这个大家都懂的，就是代表A1,至于这个Borders，还有这个LineStyle我也搞不怎么懂。

反正主要是下面的参数设置。

名称

值

说明

xlContinuous

1

实线。

xlDash

-4115

虚线。

xlDashDot

4

点划相间线。

xlDashDotDot

5

划线后跟两个点。

xlDot

-4142

点线。